* Import ENH 1996-3
* This file converts the files from the ENH 1996-3 into Stata format. 
* Inputs: Files in Data/Original/encuestas de hogares/ENH/1996/3/eh93sp96.P99
* Outputs: Files in Data/Importable/ENH/1996/TRIM 3 

clear all
version 13.1

* Change
project, doinfo   
local master "`r(pdir)'"
local doname "`r(dofile)'" 

cap mkdir "`master'/Data/Importable/ENH/1996/TRIM 3"
cd "../../Data/Original/encuestas de hogares/ENH/1996"
cd eht19963

* Registro tipo 01 - Datos de la vivienda/hogar
* Se parece a la ECV
infix tipo_registro 1-2 str id 3-24 str municipio 3-4 segmento 5-7 estrato 8 sector 9-12 seccion 13-14 manzana 15-16 vivienda 17-19 hogar 20-21 personas_hogar 22-23 resultado_encuesta 24 orden 25-26 ///
tipo_vivienda 25 material_paredes 26 material_pisos 27 acueducto 28 alcantarillado 29 electricidad 30 telefono 31 gas 32 num_cuartos 33-34 tipo_sanitario 35 basura 36 fuente_agua 37 energia_cocinar 38 propiedad_vivienda 39 cuota 40-47 lavadora 48 nevera 49 televisor 50 sonido 51 horno 52 ///
area 93-94 fex 95-98 ///
if tipo_registro==10 using eh93sp96.P99 , clear

save "`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_hogar.dta" , replace
project, creates("`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_hogar.dta")


* Registro tipo 10 - Caracteristicas generales
infix tipo_registro 1-2 str id 3-24 str municipio 3-4 segmento 5-7 estrato 8 sector 9-12 seccion 13-14 manzana 15-16 vivienda 17-19 hogar 20-21 personas_hogar 22-23 resultado_encuesta 24 orden 25-26 ///
parentesco 27-28 sexo 29 edad 30-31 estado_civil 32 str departamento_nacimiento 33-34 str municipio_nacimiento 35-37  cabecera_nacimiento 38 tiempo_residencia 39-40 cubierto_ss 41 asiste_escuela 42 colegio_oficial 43 ultimo_grado_estudios 44-46 lee_escribe 47 ///
area 93-94 fex 95-98 ///
if tipo_registro==10 using eh93sp96.P99 , clear

save "`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_general.dta" , replace
project, creates("`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_general.dta")

* Registro tipo 50 - Fuerza de trabajo
clear
infix tipo_registro 1-2 str id 3-24 str municipio 3-4 segmento 5-7 estrato 8 sector 9-12 seccion 13-14 manzana 15-16 vivienda 17-19 hogar 20-21 personas_hogar 22-23 resultado_encuesta 24 orden 25-26 ///
actividad 27 trabajo_familia 28 no_trabajo_empleo 29 razon_ausente 30 busco_ultima 31 ha_buscado 32 no_ha_buscado_t 33-34 d_ing_trabajo 35 d_ing_intereses 36 d_ing_arriendo 37 d_ing_pension 38 d_ing_ayudas 39 d_ing_otros 40 d_ing_no 41 ingreso 42-49 ///
area 93-94 fex 95-98 ///
if tipo_registro==50 using eh93sp96.P99 , clear

save "`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_fuerza_trabajo.dta" , replace
project, creates("`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_fuerza_trabajo.dta")

* Registro tipo 60 - Ocupados
clear
infix tipo_registro 1-2 str id 3-24 str municipio 3-4 segmento 5-7 estrato 8 sector 9-12 seccion 13-14 manzana 15-16 vivienda 17-19 hogar 20-21 personas_hogar 22-23 resultado_encuesta 24 orden 25-26 ///
trabajo_permanente 27 horas_ultima 28-29 horas_semana 30-31 quiere_trabajar_mas 32 motivo_trab_mas 33 ocupacion 34-35 actividad_empresa 36-37 tipo_trabajador 38 salario 39-46 salario_period 47 d_salario_alimentos 48 salario_alimentos 49-56 medio_consiguio_t 57-58 ganancia_mes 59-66 d_otros_ingresos 67 otros_ingresos 68-75 afiliado_salud 76 afiliado_pension 77  ///
area 93-94 fex 95-98 ///
if tipo_registro==60 using eh93sp96.P99 , clear
save "`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_ocupados.dta" , replace
project, creates("`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_ocupados.dta")

* Registro tipo 70 - Desocupados
clear
infix tipo_registro 1-2 str id 3-24 str municipio 3-4 segmento 5-7 estrato 8 sector 9-12 seccion 13-14 manzana 15-16 vivienda 17-19 hogar 20-21 personas_hogar 22-23 resultado_encuesta 24 orden 25-26 ///
tiempo_buscando 27-28 buscado_pte 29 buscado_tcompleto 30 buscado_tipo 31 medios_buscado_1 32-33 medios_buscado_2 34-35 medios_buscado_3 36-37  buscado_ocupacion 38-39 buscado_actividad 40-41 buscado_primeravez 42 tiempo_dejo_trabajar 43-44 trabajoo_ocupacion 45-46 trabajoo_actividad 47-48 trabajoo_tipo 49 d_ing_trabajo 50 d_ing_intereses 51 d_ing_arriendos 52 d_ing_pensiones 53 d_ing_ayudas 54 d_ing_otros 55 d_ing_no 56 ingreso 57-64 ///
area 93-94 fex 95-98 ///
if tipo_registro==70 using eh93sp96.P99 , clear
save "`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_desocupados.dta" , replace
project, creates("`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_desocupados.dta")

* Registro tipo 80 - Inactivos
clear 
infix tipo_registro 1-2 str id 3-24 str municipio 3-4 segmento 5-7 estrato 8 sector 9-12 seccion 13-14 manzana 15-16 vivienda 17-19 hogar 20-21 personas_hogar 22-23 resultado_encuesta 24 orden 25-26 ///
segunda_actividad 27 tiempo_inactivo 28 actividad_antes 29-30 tiempo_trabajando 31-32 motivo_dejo_trabajo 33 ha_buscado 34 cuando_busco 35-36 motivo_no_buscado 37 ///
area 93-94 fex 95-98 ///
if tipo_registro==80 using eh93sp96.P99 , clear
save "`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_inactivos.dta" , replace
project, creates("`master'/Data/Importable/ENH/1996/TRIM 3/1996_3_inactivos.dta")

